﻿Imports Microsoft.VisualBasic

Public Class initialList
    Dim initList(1) As String

    Private Sub initiallist(ByVal length As Integer)
        ReDim initList(length) as String
        Return initList
    End Sub

End Class
